	  9-  r   k820309    �
          11.1        |��_                                                                                                           
       hco_error_mod.F90 HCO_ERROR_MOD              HCO_ENTER HCO_LEAVE HCO_ERROR_SET HCO_ERROR_FINAL HCO_ISVERB HCO_VERBOSE_INQ HCO_LOGFILE_OPEN HCO_LOGFILE_CLOSE DP SP HP I4 I8 HCO_SUCCESS HCO_FAIL HCO_TINY HCO_MISSVAL HCO_VERSION HCOERR gen@HCO_ERROR gen@HCO_WARNING gen@HCO_MSG                                                       u #HCO_ERRORNOERR    #HCO_ERRORERR    #         @     @X                                              #HCO_ERRORNOERR%PRESENT    #HCO_ERRORNOERR%TRIM    #ERRMSG    #RC    #THISLOC                  @                                 PRESENT               @                                 TRIM           
  @@                                                 1           
D  @                                                    
 @@                                                 1 #         @     @X                                             #HCO_ERRORERR%PRESENT    #HCO_ERRORERR%TRIM 	   #ERR 
   #ERRMSG    #RC    #THISLOC                  @                                 PRESENT               @                            	     TRIM           D P@                              
     g              #HCOERR              
  @@                                                 1           
D  @                                                    
 @@                                                 1                                                        u #HCO_WARNINGNOERR    #HCO_WARNINGERR    #         @     @X                                              #HCO_WARNINGNOERR%PRESENT    #HCO_WARNINGNOERR%TRIM    #ERRMSG    #RC    #WARNLEV    #THISLOC                  @                                 PRESENT               @                                 TRIM           
  @@                                                 1           
D  @                                                    
  @                                                   
 @@                                                 1 #         @     @X                                              #HCO_WARNINGERR%PRESENT    #HCO_WARNINGERR%TRIM    #ERR    #ERRMSG    #RC    #WARNLEV    #THISLOC                  @                                 PRESENT               @                                 TRIM           D P@                                   g              #HCOERR              
  @@                                                 1           
D  @                                                    
 @@                                                   
 @@                                                 1                                                       u #HCO_MSGNOERR    #HCO_MSGERR &   #         @     @X                                              #HCO_MSGNOERR%REPEAT    #HCO_MSGNOERR%PRESENT     #HCO_MSGNOERR%TRIM !   #MSG "   #SEP1 #   #SEP2 $   #VERB %                 @                                 REPEAT               @                                  PRESENT               @                            !     TRIM           
 @@                             "                    1           
 @@                             #                                     
 @@                             $                                     
  @                              %           #         @     @X                           &                  #HCO_MSGERR%REPEAT '   #HCO_MSGERR%ASSOCIATED (   #HCO_MSGERR%PRESENT )   #HCO_MSGERR%TRIM *   #ERR +   #MSG ,   #SEP1 -   #SEP2 .   #VERB /                 @                            '     REPEAT               @                            (     ASSOCIATED               @                            )     PRESENT               @                            *     TRIM            P@                              +     g              #HCOERR              
 @@                             ,                    1           
 @@                             -                                     
 @@                             .                                     
 @@                              /           #         @                                  0                  #HCO_ENTER%ASSOCIATED 1   #HCO_ENTER%TRIM 2   #ERR 3   #THISLOC 4   #RC 5                 @                            1     ASSOCIATED               @                            2     TRIM           D P@                              3     g              #HCOERR              
  @@                             4                    1           
D @@                              5            #         @                                  6                  #HCO_LEAVE%ASSOCIATED 7   #HCO_LEAVE%TRIM 8   #ERR 9   #RC :                 @                            7     ASSOCIATED               @                            8     TRIM           D P@                              9     g              #HCOERR              
D @@                              :            #         @                                  ;                  #HCO_ERROR_SET%ASSOCIATED <   #HCO_ERROR_SET%TRIM =   #AM_I_ROOT >   #ERR ?   #LOGFILE @   #VERBOSE A   #WARNINGLEVEL B   #RC C                 @                            <     ASSOCIATED               @                            =     TRIM           
   @                              >                     D P@                              ?     g              #HCOERR              
  @@                             @                    1           
D  @                              A                      
D  @                              B                      
D  @                              C            #         @                                  D                  #HCO_ERROR_FINAL%ASSOCIATED E   #ERR F                 @                            E     ASSOCIATED           D P@                              F     g              #HCOERR    %         @                                 G                          #HCO_ISVERB%ASSOCIATED H   #ERR I   #VERBNR J                 @                            H     ASSOCIATED            P@                              I     g              #HCOERR              
   @                              J           %         @                                 K                          #HCO_VERBOSE_INQ%ASSOCIATED L   #ERR M                 @                            L     ASSOCIATED            P@                              M     g              #HCOERR    #         @                                  N                  #HCO_LOGFILE_OPEN%REPEAT O   #HCO_LOGFILE_OPEN%ASSOCIATED P   #HCO_LOGFILE_OPEN%TRIM Q   #ERR R   #RC S                 @                            O     REPEAT               @                            P     ASSOCIATED               @                            Q     TRIM           D P@                              R     g              #HCOERR              
D  @                              S            #         @                                 T                  #HCO_LOGFILE_CLOSE%ASSOCIATED U   #HCO_LOGFILE_CLOSE%PRESENT V   #HCO_LOGFILE_CLOSE%TRIM W   #ERR X   #SHOWSUMMARY Y                 @                            U     ASSOCIATED               @                            V     PRESENT               @                            W     TRIM           D P@                              X     g              #HCOERR              
 @@                              Y                                                        Z                                                                                                      [                                                                                                      \                                                                                                      ]                                                      4                                             ^                                                      8                                             _                                                       0                                             `                                          �������                                                    a     
                
                 3���#�I9        1.0E-32                                            b     	                   	                  |o��                                                        c                                                        Cv2.1.012                                      @                               'g             
      #FIRSTOPEN d   #ISROOT e   #LOGISOPEN f   #WARNINGS g   #VERBOSE h   #NWARNINGS i   #CURRLOC j   #LOC k   #LOGFILE l   #LUN m               � $                              d                                                                                    ���������J                    � $                              e                                                                                           �J                    � $                              f                                                                                           �J                    � $                              g                                                                                                0                � $                              h                                                                                                0                � $                              i                                                                                                0                � $                              j                                                                                   ��������            .           �$                            k                   �                     &                                                                                          y                                                           � $                             l     �       d       	                                                                                      C                                                                                                                                                                                                                                                                                               � $                              m     c      
                                                                       ��������               �   (      fn#fn #   �   �   b   uapp(HCO_ERROR_MOD    �  f       gen@HCO_ERROR    $  �      HCO_ERRORNOERR '   �  @      HCO_ERRORNOERR%PRESENT $     =      HCO_ERRORNOERR%TRIM &   ?  L   a   HCO_ERRORNOERR%ERRMSG "   �  @   a   HCO_ERRORNOERR%RC '   �  L   a   HCO_ERRORNOERR%THISLOC      �      HCO_ERRORERR %   �  @      HCO_ERRORERR%PRESENT "   �  =      HCO_ERRORERR%TRIM !   7  T   a   HCO_ERRORERR%ERR $   �  L   a   HCO_ERRORERR%ERRMSG     �  @   a   HCO_ERRORERR%RC %     L   a   HCO_ERRORERR%THISLOC     c  j       gen@HCO_WARNING !   �  �      HCO_WARNINGNOERR )   |  @      HCO_WARNINGNOERR%PRESENT &   �  =      HCO_WARNINGNOERR%TRIM (   �  L   a   HCO_WARNINGNOERR%ERRMSG $   E  @   a   HCO_WARNINGNOERR%RC )   �  @   a   HCO_WARNINGNOERR%WARNLEV )   �  L   a   HCO_WARNINGNOERR%THISLOC    	  �      HCO_WARNINGERR '   �	  @      HCO_WARNINGERR%PRESENT $   
  =      HCO_WARNINGERR%TRIM #   B
  T   a   HCO_WARNINGERR%ERR &   �
  L   a   HCO_WARNINGERR%ERRMSG "   �
  @   a   HCO_WARNINGERR%RC '   "  @   a   HCO_WARNINGERR%WARNLEV '   b  L   a   HCO_WARNINGERR%THISLOC    �  b       gen@HCO_MSG      �      HCO_MSGNOERR $   �  ?      HCO_MSGNOERR%REPEAT %     @      HCO_MSGNOERR%PRESENT "   H  =      HCO_MSGNOERR%TRIM !   �  L   a   HCO_MSGNOERR%MSG "   �  P   a   HCO_MSGNOERR%SEP1 "   !  P   a   HCO_MSGNOERR%SEP2 "   q  @   a   HCO_MSGNOERR%VERB    �  �      HCO_MSGERR "   �  ?      HCO_MSGERR%REPEAT &   �  C      HCO_MSGERR%ASSOCIATED #   
  @      HCO_MSGERR%PRESENT     J  =      HCO_MSGERR%TRIM    �  T   a   HCO_MSGERR%ERR    �  L   a   HCO_MSGERR%MSG     '  P   a   HCO_MSGERR%SEP1     w  P   a   HCO_MSGERR%SEP2     �  @   a   HCO_MSGERR%VERB      �       HCO_ENTER %   �  C      HCO_ENTER%ASSOCIATED    �  =      HCO_ENTER%TRIM      T   a   HCO_ENTER%ERR "   o  L   a   HCO_ENTER%THISLOC    �  @   a   HCO_ENTER%RC    �  �       HCO_LEAVE %   �  C      HCO_LEAVE%ASSOCIATED    �  =      HCO_LEAVE%TRIM      T   a   HCO_LEAVE%ERR    V  @   a   HCO_LEAVE%RC    �  �       HCO_ERROR_SET )   `  C      HCO_ERROR_SET%ASSOCIATED #   �  =      HCO_ERROR_SET%TRIM (   �  @   a   HCO_ERROR_SET%AM_I_ROOT "      T   a   HCO_ERROR_SET%ERR &   t  L   a   HCO_ERROR_SET%LOGFILE &   �  @   a   HCO_ERROR_SET%VERBOSE +      @   a   HCO_ERROR_SET%WARNINGLEVEL !   @  @   a   HCO_ERROR_SET%RC     �  q       HCO_ERROR_FINAL +   �  C      HCO_ERROR_FINAL%ASSOCIATED $   4  T   a   HCO_ERROR_FINAL%ERR    �  �       HCO_ISVERB &     C      HCO_ISVERB%ASSOCIATED    K  T   a   HCO_ISVERB%ERR "   �  @   a   HCO_ISVERB%VERBNR     �  y       HCO_VERBOSE_INQ +   X  C      HCO_VERBOSE_INQ%ASSOCIATED $   �  T   a   HCO_VERBOSE_INQ%ERR !   �  �       HCO_LOGFILE_OPEN (   �  ?      HCO_LOGFILE_OPEN%REPEAT ,   �  C      HCO_LOGFILE_OPEN%ASSOCIATED &   #  =      HCO_LOGFILE_OPEN%TRIM %   `  T   a   HCO_LOGFILE_OPEN%ERR $   �  @   a   HCO_LOGFILE_OPEN%RC "   �  �       HCO_LOGFILE_CLOSE -   �  C      HCO_LOGFILE_CLOSE%ASSOCIATED *   �  @      HCO_LOGFILE_CLOSE%PRESENT '   6  =      HCO_LOGFILE_CLOSE%TRIM &   s  T   a   HCO_LOGFILE_CLOSE%ERR .   �  @   a   HCO_LOGFILE_CLOSE%SHOWSUMMARY       p       DP    w   p       SP    �   p       HP    W!  q       I4    �!  q       I8    9"  q       HCO_SUCCESS    �"  p       HCO_FAIL    #  w       HCO_TINY    �#  p       HCO_MISSVAL    $  �       HCO_VERSION    �$  �       HCOERR !   ^%  �   a   HCOERR%FIRSTOPEN    &  �   a   HCOERR%ISROOT !   �&  �   a   HCOERR%LOGISOPEN     J'  �   a   HCOERR%WARNINGS    �'  �   a   HCOERR%VERBOSE !   �(  �   a   HCOERR%NWARNINGS    9)  �   a   HCOERR%CURRLOC    �)  �   a   HCOERR%LOC    �*  �  a   HCOERR%LOGFILE    �,  �   a   HCOERR%LUN 